home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 41 / 64er_Magazin_Sonderheft_41_19xx_Markt__Technik_de.d64 / listing 2 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  523 b   |  22 lines
  1. 100 rem aenderung von id, formatkenn-
  2. 101 rem zeichen & leerzeichen zwischen
  3. 102 rem diesen beiden.(insg. 5 zeichen)
  4. 103 rem bsp: alte id :xy 2a
  5. 104 rem             id^  ^formatkennz.
  6. 105 rem kann auf     :hallo
  7. 106 rem geaendert werden. das leerz.
  8. 107 rem wird hier zum ersten 'l'
  9. 108 rem wirkt sich nur auf direct. aus!
  10. 109 :
  11. 110 open 15,8,15,"i":open1,8,2,"#"
  12. 120 print#15,"u1 2 0 18 0"
  13. 130 print#15,"b-p 2 162"
  14. 140 get#1,a$,b$,c$,d$,e$
  15. 150 print a$;b$;c$;d$;e$
  16. 160 input"neu:";n$
  17. 170 print#15,"b-p 2 162"
  18. 180 print#1,n$;
  19. 190 print#15,"u2 2 0 18 0"
  20. 200 print#15,"i"
  21. 210 close 8:close 15
  22.